home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / util / misc / sss.lha / sss / data.i next >
Text File  |  1998-10-26  |  3KB  |  76 lines
  1. *******************************************************************************
  2. * data v1.1.3
  3. *******************************************************************************
  4.  
  5.     section    MiscData,DATA
  6.  
  7. *******************************************************************************
  8. * variables
  9.  
  10.     cnop    0,4
  11. _DOSBase    dc.l    0
  12. _StdOut    dc.l    0    ;standard output handle
  13. CmdLnPtr    dc.l    0    ;adr of command line
  14. CmdLnLen    dc.l    0    ;length of command line
  15.  
  16. WrkBufAdr    dc.l    0    ;work buffer adr
  17. WrkBufLen    dc.l    0    ;work buffer length
  18. ChnkSize    dc.l    0    ;chunk length
  19. InFileHnd    dc.l    0    ;source file handle
  20. InFileSze    dc.l    0    ;size of source file
  21. ExtnAdr    dc.l    0    ;ptr to extension
  22. MaxChnk    dc.l    0    ;highest chunk #
  23. DgtNmb    dc.l    0    ;min necessary length of extension
  24. flags    dc.b    0    ;see defs.i for bit allocations
  25.  
  26. *******************************************************************************
  27. * tables
  28.  
  29.     cnop    0,4
  30. ErrTab    dc.l    txt_AllDne,txt_LowMem,txt_SouFle
  31.     dc.l    txt_ChnkSz,txt_DstFle,txt_ChnkNb
  32.  
  33. *******************************************************************************
  34. * texts
  35.  
  36. _DOSName    dc.b    "dos.library",0
  37.  
  38. txt_vers    dc.b    "$VER: sss v1.0 (26.10.1998)",0
  39. txt_title    dc.b    10,"›1msss v1.0›0m (26.10.1998) - © 1998 Simone Bevilacqua",10,10,0
  40. txt_InfoArrow    dc.b    " -> ",0
  41. txt_InfoBytes    dc.b    " bytes"
  42. txt_ENTER    dc.b    10,0
  43. txt_writing    dc.b    13,"writing          : ",0
  44. txt_InfoFName    dc.b    "source file name : ",0
  45. txt_InfoFSize    dc.b    "source file size : ",0
  46. txt_InfoOFile    dc.b    "chunks file names: ",0
  47. txt_InfoCSize    dc.b    "chunks size      : ",0
  48. txt_InfoBSize    dc.b    "buffer size      : ",0
  49.  
  50. txt_error    dc.b    "ERROR: ",0
  51. txt_AllDne    dc.b    "all done!",10,10,0
  52. txt_LowMem    dc.b    "not enough memory!",10,0
  53. txt_SouFle    dc.b    "can't read from source file",10,0
  54. txt_DstFle    dc.b    "can't write to destination",10,0
  55. txt_ChnkSz    dc.b    "wrong chunk size",10,0
  56. txt_ChnkNb    dc.b    "too many chunks (max. 10000)!",10,0
  57. txt_UsgHlp    dc.b    "  ›1mSYNTAX›0m",10,10
  58.     dc.b    "    sss [›1m-q›0m] ›1mInputFile ChunkSize ›0m[›1mOutBase›0m]",10,10
  59.     dc.b    "  ›1mARGS›0m",10,10
  60.     dc.b    "    ›1m-q       ›0m = quiet mode: don't print any message",10
  61.     dc.b    "    ›1mInputFile›0m = name of the file to split",10
  62.     dc.b    "    ›1mChunkSize›0m = size in bytes of each chunk",10
  63.     dc.b    "                (0 < ChunkSize < $7fffffff = 2,147,483,647)",10
  64.     dc.b    "    ›1mOutBase›0m   = output files will be called ›1mOutBase›0m.x",10
  65.     dc.b    "                (000 <= x <= 99,999; by default ›1mOutBase›0m = ›1mInputFile›0m)",10,0
  66.  
  67. *******************************************************************************
  68. * buffers
  69.  
  70.     section    bufs,BSS
  71. InFile    ds.b    1024    ;file to split
  72. OutBase    ds.b    1024
  73.  
  74.     cnop    0,4
  75. TmpBuf    ds.b    256
  76.